home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 090 / pctj8406.arc / TEST4.PRG < prev    next >
Text File  |  1986-09-14  |  256b  |  14 lines
  1. *********************
  2. * Program TEST4.PRG *
  3. *********************
  4. ERASE
  5. @ 5,20 SAY "And this is TEST4 . . ."
  6. STORE 1 TO N4
  7. DO WHILE N4<50
  8. STORE N4+1 TO N4
  9. ENDDO
  10. RETURN
  11.  
  12.  
  13.  
  14.